* progmodes/octave.el (octave-sync-function-file-names): Fix last

  change.

diff --git a/lisp/progmodes/octave.el b/lisp/progmodes/octave.el
index 3c24205eb8ef8e1d99b5dc841836ac49851c5aef..f8b9e4f6fab12dc71e0475468493cf9d4ba2d941 100644 (file)
--- a/lisp/progmodes/octave.el
+++ b/lisp/progmodes/octave.el
@@ -1024,7 +1024,8 @@ See Info node `(octave)Function Files'."
                    (file-name-nondirectory buffer-file-name)))
             (func (and (re-search-forward octave-function-header-regexp nil t)
                        (match-string 3))))
-        (when (and (not (equal file func))
+        (when (and func
+                   (not (equal file func))
                    (yes-or-no-p
                     "Function name different from file name. Fix? "))
           (replace-match file nil nil nil 3))))))